home *** CD-ROM | disk | FTP | other *** search
/ Yellows - Privacy (Deluxe) / Akira Gomi Photographs - Yellows: Privacy (Deluxe) - Disc 1.iso / mono / u.dxr / 00064.ls < prev    next >
Encoding:
Text File  |  1996-07-06  |  1.0 KB  |  35 lines
  1. global foremovie
  2.  
  3. on startpictset
  4.   global startpictnum
  5.   if (startpictnum = 2) or (startpictnum = 3) then
  6.     set the castNum of sprite 3 to the number of member "002/003"
  7.   else
  8.     if (startpictnum = 5) or (startpictnum = 12) then
  9.       set the castNum of sprite 3 to the number of member "005/012"
  10.     else
  11.       if (startpictnum = 7) or (startpictnum = 14) then
  12.         set the castNum of sprite 3 to the number of member "007/014"
  13.       else
  14.         if (startpictnum = 17) or (startpictnum = 27) then
  15.           set the castNum of sprite 3 to the number of member "017/027"
  16.         else
  17.           if (startpictnum = 23) or (startpictnum = 26) then
  18.             set the castNum of sprite 3 to the number of member "023/026"
  19.           else
  20.             set a to digitchange(startpictnum)
  21.             set the castNum of sprite 3 to the number of member a
  22.           end if
  23.         end if
  24.       end if
  25.     end if
  26.   end if
  27. end
  28.  
  29. on digitchange num
  30.   set a to num / 100
  31.   set b to (num - (100 * a)) / 10
  32.   set c to num - (100 * a) - (10 * b)
  33.   return a & b & c
  34. end
  35.